home *** CD-ROM | disk | FTP | other *** search
/ Geek Games #12 / GEGA012.iso / Jogos de Azar / flash_poker.swf / scripts / frame_17 / DoAction.as
Text File  |  2006-01-17  |  223b  |  13 lines
  1. PickCard = random("54") + "1";
  2. if("52" < PickCard)
  3. {
  4.    PickCard = "53";
  5. }
  6. Picked = eval("Deck" add PickCard);
  7. if(Picked == "1")
  8. {
  9.    call("GetCard");
  10. }
  11. set("Deck" add PickCard,"1");
  12. set("Hand" add X,PickCard);
  13.